// .txt

beginzonescript;

variables;

short crime_tolerance = 200;
short last_abil;
short i;
short set_att = 0;
short enc_count = 0;

body;

beginstate INIT_STATE;
	sf(68,6,0);
	
	set_name(47,"Dera Nomad");
	set_name(48,"Dera Nomad");
	set_level(47,28);
	set_level(48,28);
	set_new_abil(47,20);
	set_new_abil(48,20);
	set_attack_bonus(47,16);
	set_attack_bonus(48,16);
	
	if (gf(68,20) > 0) {
		erase_char(47);
		erase_char(48);
		}

	// 1st shaper group
	add_range_to_group(8,11,1);
	
	// servile guards group
	add_range_to_group(12,19,2);

	// servile leader group
	add_range_to_group(20,22,3);
	
	// two creaiton groups group
	add_range_to_group(23,26,4);
	add_range_to_group(27,31,5);
	
	//if (get_sdf() > 0) {
		//make_zone_hostile();
		//}
		
	if ((zone_clear(ME) == FALSE) && (get_flag(68,12) > 0)) 
		clear_zone(ME);	

	last_abil = get_current_tick();
	
	set_crime_tolerance(crime_tolerance);
	break;

beginstate EXIT_STATE;

break;

beginstate START_STATE;
	if ((get_terrain(12,12) != 0) && (gf(68,20) > 0))
		set_terrain(12,12,0);
	
	if ((set_att == 0) && (gf(68,11) > 0)) {
		set_att = 1;
		set_attitude(1002,10);
		set_act_at_dist(1002,1);
		set_attitude(1003,10);
		set_act_at_dist(1003,1);
		set_attitude(1004,10);
		set_act_at_dist(1004,1);
		set_attitude(1005,10);
		set_act_at_dist(1005,1);
		}	
	
	if (char_ok(47) == FALSE) 
		set_attitude(48,10);
	if ((char_ok(47)) && (get_attitude(47) >= 10))
		set_attitude(48,10);
	if (char_ok(48) == FALSE) 
		set_attitude(47,10);
	if ((char_ok(48)) && (get_attitude(48) >= 10))
		set_attitude(47,10);
		
		
	
	// clear zone?
	if ((zone_clear(ME) == FALSE) && (get_flag(68,1) > 0)) 
		clear_zone(ME);	
	if ((zone_clear(ME) == FALSE) && (get_flag(68,2) > 0)) 
		clear_zone(ME);	
		
	//if ((get_crime_level() >= crime_tolerance) && (get_sdf(,) == 0)) {
	//	make_zone_hostile();
	//	set_flag(,,1);
	//	}

	// if (gf(,) == 0) {
	//	if (get_ran(1,0,100) < 10)
	//		give_char_text_bubble(,"");
	//	}
	
	if ((gf(68,2) == 0) && (gf(68,22) > 0)) {
		sf(68,2,1);
		sf(68,6,0);
		sf(68,12,2);
		set_act_at_dist(1002,1);
		set_act_at_dist(1003,1);
		set_act_at_dist(1004,1);
		set_act_at_dist(1005,1);
		begin_talk_mode(5);
		}
		
	if (((is_combat()) && (tick_difference(last_abil,get_current_tick()) > 0)) || ((is_group()) && (tick_difference(last_abil,get_current_tick()) > 3))) {
		last_abil = get_current_tick();
		
		if (gf(68,6) == 2) {
			enc_count = enc_count + 1;
			if (enc_count == 3) {
				print_str_color("More loyalist warriors are coming down the road.",3);
				activate_hidden_group(1);
				add_range_to_group(33,38,6);
				set_act_at_dist(1006,1);
				}
			if (enc_count == 8) {
				print_str_color("The main force of loyalist warriors is coming down the road.",3);
				activate_hidden_group(2);
				add_range_to_group(39,46,7);
				set_act_at_dist(1007,1);
				}
			}
		
		}
break;

beginstate 10;
	if ((gf(68,11) == 0) && (gf(68,7) < 2) && (gf(68,6) == 0)) {
		sf(68,11,1);
		begin_talk_mode(7);
		}
	break;

beginstate 11;
	if ((gf(68,11) == 0) && (gf(68,6) == 0) && (gf(68,10) > 1) && (gf(68,2) == 0)) {
		sf(68,6,2);
		sf(68,12,1);
		
		set_attitude(1001,10);
		set_act_at_dist(1001,1);
		set_new_abil(1001,20);

		set_new_abil(1002,20);
		set_attack_bonus(1002,8);

		begin_talk_mode(6);

		}
break;

//	print_str("");
//	set_terrain_string_range(".",3);
//	set_terrain_string_range("The sign says - .",3);
